home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Purity / Purity #22 (1994-01-19)(Diesel)(DE)[WB].zip / Purity #22 (1994-01-19)(Diesel)(DE)[WB].adf / Remdiskdrive / LiesMich next >
Text File  |  1994-01-18  |  1KB  |  47 lines
  1.  
  2.  
  3.  
  4.   Hallo Freunde !                                           22.12.93
  5.   
  6.   Heute mal ein Proggy für Leute die Speichermangel haben, aber eine
  7.   Festplatte besitzen. Dieses Programm schaltet alle Laufwerke aus,
  8.   und gibt den Speicher frei, den sie belegt haben. Bei 2 Laufwerken
  9.   fast 35 000 Bytes !
  10.   Unten noch eine Version, die nur ein Laufwerk ausschaltet.
  11.   Man sollte nicht nochmal versuchen auf das abgeschaltete Laufwerk
  12.   zuzugreifen sonst kommt eventuell der Guru !
  13.   Außerdem sollte man das Programm vor dem Aufrufen auf Festplatte
  14.   kopieren, sonst kommt auch der Guru ! (Bei mir jedenfalls)
  15.   
  16.   Spread the word AND the disk !!!
  17.  
  18.                                      Røgersøft
  19.  
  20.  
  21.   {
  22.   Kleine Bemerkung von Diesel:
  23.  
  24.   Diese Methode, die Laufwerke abzumelden, sit natürlich nicht ganz
  25.   kosher. Sobald ein Programm z.B. über einen FileRequester versucht,
  26.   auf ein Diskettenlaufwerk zuzugreifen, wird Euch unweigerlich eine
  27.   Gratisreise nach Indien gewährt. Abgesehen davon, daß nur das RAM
  28.   freigegeben wird, welches durch das trackdisk an sich belegt war.
  29.   Der vom Trackdisk allozierte Speicher wie Listen, Nodes, Puffer
  30.   etc. wird nicht freigegeben .... :(
  31.   }
  32.  
  33.  
  34.    PROGRAM laufwerklöschen;
  35.    Uses exec;
  36.   
  37.    VAR ltask:p_task;
  38.   
  39.    BEGIN
  40.     lTask:=Findtask('trackdisk.device');
  41.     IF lTask<> NIL THEN Remtask(ltask);
  42.    END.
  43.  
  44.  
  45.  
  46.  
  47.